Inference at * 
Iof proof for Lemma order functionality wrt iff:


  T:Type, R, R':(TT).
  (x, y:T. R(x,y)  R'(x,y))  (Order(T;x,y.R(x,y))  Order(T;x,y.R'(x,y))) 

latex

 by ((((RepD) 
CollapseTHENA ((Auto_aux (first_nat 1:n) ((first_nat 1:n),(first_nat 3:n
C)) (first_tok :t) inil_term)))) 
CollapseTHEN (Unfold `order` 0)) 

latex

C1: 

C1: 1. T : Type
C1: 2. R : TT
C1: 3. R' : TT
C1: 4. x, y:T. R(x,y)  R'(x,y)
C1:   (Refl(T;x,y.R(x,y)) & Trans(T;x,y.R(x,y)) & AntiSym(T;x,y.R(x,y)))
C1:    (Refl(T;x,y.R'(x,y)) & Trans(T;x,y.R'(x,y)) & AntiSym(T;x,y.R'(x,y)))
C.

Definitions	P  Q, P & Q, t  T, Order(T;x,y.R(x;y)), x(s1,s2), P  Q, P  Q, , x:A. B(x)
Lemmas	iff wf